inherited frmRuleExplain: TfrmRuleExplain
  Left = 516
  Top = 197
  BorderStyle = bsSizeable
  Caption = #21151#33021#35268#21017#35828#26126
  ClientHeight = 417
  ClientWidth = 543
  ExplicitWidth = 561
  ExplicitHeight = 463
  PixelsPerInch = 119
  TextHeight = 12
  inherited Panel1: TPanel
    Width = 543
    Height = 28
    ExplicitWidth = 555
    ExplicitHeight = 28
    inherited labFuncName: TLabel
      Left = 10
      Top = 9
      ExplicitLeft = 10
      ExplicitTop = 9
    end
    inherited labFuncDesc: TLabel
      Left = 106
      Top = 9
      Visible = False
      ExplicitLeft = 106
      ExplicitTop = 9
    end
    inherited img3: TImage
      Left = 492
      ExplicitLeft = 504
    end
    inherited Bevel1: TBevel
      Top = 25
      Width = 543
      ExplicitTop = 25
      ExplicitWidth = 555
    end
  end
  inherited pnlBottom: TPanel
    Top = 362
    Width = 543
    ExplicitTop = 374
    ExplicitWidth = 555
    inherited bvl1: TBevel
      Width = 543
      ExplicitWidth = 555
    end
    inherited btnOK: TcxButton
      Left = 366
      OnClick = btnOKClick
      ExplicitLeft = 378
    end
    inherited btnCancel: TcxButton
      Left = 449
      OnClick = btnCancelClick
      ExplicitLeft = 461
    end
  end
  object cxMemo1: TcxMemo
    Left = 0
    Top = 28
    Align = alClient
    Lines.Strings = (
      'cxMemo1')
    TabOrder = 2
    ExplicitWidth = 555
    ExplicitHeight = 346
    Height = 334
    Width = 543
  end
  object qryRuleExplain: TUniQuery
    SQLUpdate.Strings = (
      
        'update ts_modulesfuncinfo set mf_ruleexplain=:mf_ruleexplain whe' +
        're mf_menuid=:Old_mf_menuid')
    Connection = MainDM.UniConn
    SQL.Strings = (
      
        'select mf_ruleexplain,mf_menuid=:menuid from ts_modulesfuncinfo ' +
        'where mf_menuid=:menuid')
    Options.PrepareUpdateSQL = True
    Options.AutoPrepare = True
    Left = 96
    Top = 216
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'menuid'
        Value = nil
      end>
  end
end
